home *** CD-ROM | disk | FTP | other *** search
/ Catch Me If You Can Press Kit / Catch Me if You Can Press Kit.iso / mac / Catch Me If You Can.dxr / button_55_roll right 10 (V3).ls < prev    next >
Encoding:
Text File  |  2002-11-21  |  405 b   |  17 lines

  1. property spriteNum, myStartLoc
  2. global mySprite
  3.  
  4. on exitFrame
  5.   mySprite = sprite(spriteNum).locH
  6.   myLoc = mySprite
  7.   if mySprite < 1100 then
  8.     sprite(spriteNum).locH = sprite(spriteNum).locH + 10
  9.   else
  10.     sprite(spriteNum).locH = -90
  11.     if inside(point(the mouseH, the mouseV), the rect of sprite 2) then
  12.       sprite(spriteNum).locH = sprite(spriteNum).locH
  13.     end if
  14.   end if
  15.   updateStage()
  16. end
  17.